home *** CD-ROM | disk | FTP | other *** search
/ Shareware Overload Trio 2 / Shareware Overload Trio Volume 2 (Chestnut CD-ROM).ISO / dir36 / getkey16.zip / COLORS2.BAT < prev    next >
DOS Batch File  |  1993-08-08  |  2KB  |  43 lines
  1. @echo off
  2. rem colors2.bat
  3. REM This test file is an example of how you may use GETKEY to change
  4. rem display color
  5.  
  6. getkey "default colors " /d,, /n /m8,10"~A blue,gray,white" /m8,11"~B black,yellow,white" /m8,13"~Q End" /m8,12"~D blue,white,yellow"
  7. if errorlevel 4 if not errorlevel 5 goto end
  8. if errorlevel 3 if not errorlevel 4 goto DBWY
  9. if errorlevel 2 if not errorlevel 3 goto BBYW
  10. if errorlevel 1 if not errorlevel 2 goto ABLW
  11.  
  12. :ABLW
  13. getkey "A - 1,7,15 " /d1,, /n /m8,10"~B black,yellow,white" /m8,11"~C default" /m8,13"~Q End" /m8,12"~D blue,white,yellow"
  14. if errorlevel 4 if not errorlevel 5 goto end
  15. if errorlevel 3 if not errorlevel 4 goto DBWY
  16. if errorlevel 2 if not errorlevel 3 goto CDEF
  17. if errorlevel 1 if not errorlevel 2 goto BBYW
  18.  
  19.  
  20. :BBYW
  21. getkey "B - 1,14,15 " /d,14, /n /m8,10"~A blue,gray,white" /m8,11"~C default" /m8,13"~Q End" /m8,12"~D blue,white,yellow"
  22. if errorlevel 4 if not errorlevel 5 goto end
  23. if errorlevel 3 if not errorlevel 4 goto DBWY
  24. if errorlevel 2 if not errorlevel 3 goto CDEF
  25. if errorlevel 1 if not errorlevel 2 goto ABLW
  26.  
  27. :CDEF
  28. getkey "C - 1,7,15 " /d,, /n /m8,10"~A blue,gray,white" /m8,11"~B black,yellow,white" /m8,13"~Q End" /m8,12"~D blue,white,yellow"
  29. if errorlevel 4 if not errorlevel 5 goto end
  30. if errorlevel 3 if not errorlevel 4 goto DBWY
  31. if errorlevel 2 if not errorlevel 3 goto BBYW
  32. if errorlevel 1 if not errorlevel 2 goto ABLW
  33.  
  34. :DBWY
  35. getkey "D - 1,15,14 " /d1,15,14 /n /m8,10"~A blue,gray,white" /m8,11"~B black,yellow,white" /m8,12"~C default" /m8,13"~Q End"
  36. if errorlevel 4 if not errorlevel 5 goto end
  37. if errorlevel 3 if not errorlevel 4 goto CDEF
  38. if errorlevel 2 if not errorlevel 3 goto BBYW
  39. if errorlevel 1 if not errorlevel 2 goto ABLW
  40.  
  41. :End
  42. cls
  43.